From the graphs, it is clearly visible that increased rainfall intensity is directly linked with rising temperature. The change in minimum temperature has a greater impact.
climate_change <- read.csv(file = "Weather Data Bangladesh (1948 - 2013).csv",TRUE, sep = ",", stringsAsFactors = FALSE)
library(ggplot2)
library(plotly)
library(ggiraph)
library(ggiraphExtra)
fit_max=lm(Max.Temp~Rainfall,data=climate_change)
summary(fit_max)
##
## Call:
## lm(formula = Max.Temp ~ Rainfall, data = climate_change)
##
## Residuals:
## Min 1Q Median 3Q Max
## -11.2446 -1.8591 0.1282 1.8429 10.8586
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 3.284e+01 2.576e-02 1274.73 <2e-16 ***
## Rainfall 3.208e-03 8.308e-05 38.62 <2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 2.886 on 21118 degrees of freedom
## Multiple R-squared: 0.06596, Adjusted R-squared: 0.06591
## F-statistic: 1491 on 1 and 21118 DF, p-value: < 2.2e-16
ggPredict(fit_max,se=TRUE,interactive=TRUE)
fit_min=lm(Min.Temp~Rainfall,data=climate_change)
summary(fit_min)
##
## Call:
## lm(formula = Min.Temp ~ Rainfall, data = climate_change)
##
## Residuals:
## Min 1Q Median 3Q Max
## -19.5934 -3.0074 0.7515 3.1958 8.3510
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 1.870e+01 3.559e-02 525.4 <2e-16 ***
## Rainfall 1.240e-02 1.148e-04 108.0 <2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 3.987 on 21118 degrees of freedom
## Multiple R-squared: 0.356, Adjusted R-squared: 0.3559
## F-statistic: 1.167e+04 on 1 and 21118 DF, p-value: < 2.2e-16
ggPredict(fit_min,se=TRUE,interactive=TRUE)
## From the graphs, it is clearly visible that increased rainfall intensity is directly linked with rising temperature. The change in minimum temperature has a greater impact.
knitr::opts_chunk$set(echo = TRUE)
Continuing the planet’s long-term warming trend, the year’s globally averaged temperature was 1.84 degrees Fahrenheit (1.02 degrees Celsius) warmer than the baseline 1951-1980 mean. In Bangladesh, all recent years after 2000 were hotter than average and almost all of them had higher rainfall intensity.